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releases and compiler version identified in the VSR. The FORTRAN Compiler 
Validation System is used to determines insotar as is practical, the deure 
to which the subject compiler conforms to American Standard FORTKAN, 
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SECTION 1. INTRODUCTION 


1.1 Purpose of the Validation Summary Report 
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The Department of the Navy may make full and free public disclosure of the 
Validation Summary Report (VSR) im accordance with the "freedom of Inforwatior 
Act" €S Wos.€. #552). The mesutits of the validation are onty for the purposes 
of satisfying United States Government requirementss and apply only to the 
computer system, Operating system release, and compiler version icentified 

in the VSR. 


The FORTRAN Compiler Validation System is used to determines insofar as is 
orecticals, the degree to which the subject compiler conforms to the FORTS 
Standard. Thus, the VSR is necessarily discretionary and judamental. if 
'‘Inited States Government does not represent or warrant that the statements, 
or any one of them, set forth in the VSR are accurate or complete. The Vs 

is not meant to be used for the purpose of publicizina the findinces summerize 
therein. 


Sources of Additional Intormation 


The detailed FORTRAN lLenguane specifications are given in the publicatioar 
American Standard FORTRAN, ¥3.9-1966", available from the American “Nati 
Stancards Institute, 14350 froadways New Yorks New York OTF 


fr explanation of the FORTRAN Comriler Validation System is contained 1 
FCVS User’s Guide. This document explains how to run the compiler valid 
system. The Uttser’s Guide and a maqnetic tape containing a copy of tne FC 
roaqrams are available from the ational Technical Information Service, 
ft f 


Port koyel KOaOs Sporis ‘fields Viroinias 22151. (Orcerine intorer th 
an be obtained from the Federal COSOL Compiler Testinn Service.) 
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SECTION 2. DETAILED EVALUATION SF ERRORS. 


This section summarizes the results of the compilation and execution of the 
orogcrams comprisine the FORTRAN Compiler Validation System CFCVS). The version 
of the FCVS used during this validation is shown inside the front cover of the 


ep 
Votre 


Section ¢ is made up of two subsections. The first subsection describes eact 
syntax error encountered during compilation of the audit routiness and the 
second subsection describes the semantic errors encountered durina executior 
of the audit routines. 


Each error or deviation noted in this section makes reference to a prooren 
contained in Appendix A (Validation Summary Workina YXocument). Tris reference 
provides the documented results af an occurrence of errors/deviations detecte* 
jurina the runnine of the FCVS usina the compiler within the environment 
identified in this document. The Validation Summary working bhacument is 
presented in sequence vy oproaram mutter. 
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eat Syntactical frrors 


The compiler produced a fatal error messaace for an arithmetic assignment 
Statement containing 57 nested parentheses. (See F045.) i 


3.9-1°40 References: Section 4.1, frithmetic Fxpressions 
Section 7.1.1.1 Arithmetic Assianment Statement 


Lwe Semantic terrors 


© semantic errors occurred during the execution of the FCVS audit 
routines. 


| 
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SECTION 3. SOFTWARE ENVIRONMENT. 


The compiler referenced in this document was validated usine the softwar 
environment described in this sectior. When uSina a mocification of the 
described environments the compiler may or may not continue to conform tr 
Standara. It should he noted thet durina the validation processs, an attennt 
is made to validate as many different options as possible. 

The use of compiler options, looical unit/ohvsical device assianments, 
and any form of aptimization which is not described in this report could cause 
the compiler te produce a prosram that does not perform accordino to the 
specifications of Standard FORTRAN. Only the environment described in this 
document has been used with this compiler to satisfy the validation reguire- 
ments of the Department of the Navy. 


t. ptions or parameters used on the processor call statement fer the comril 
Options scecified: 
? COMPILE FMann CET] WITH FORTRAN (CTI; 


DATA CARD 
$ SET LENEDNEO 


2. Logical Unit/Physical Device Assianments. 


Printer Destined Files: 


Locical unit 06 was assigned to a printer output file by usins the 
followine FILE source card within the proocram: 


FREE E(CKIND=G,PAXRECSIZE=22) 
and ET control card: 


? EFCFILE FILES CTITLE=FCVS/FILE6G,-INIMODE=ERCDIC)); 


Tepe Files: 


Logical unit 07 was assigned to a tape file by usitno the following FILE 


source card within the program: 
FILE COCKIND=15 -MAXRECSIZE=20-BLOCKSI7F=200) 


and FT control cards: 


fr 


7 ETCFILE FILE7CTITLE=FCVS/FILE7-INTMODE=ERODIC oAREAS=10L> 
AREASTZFEOO 2SAVEFACTOR=2 -PROTECTIUN=SAVE)D D5 


Sequential “ass-storage Files: 


Logical unit 97 was assianed to a mass=storane device hy usin 
the followina FILE source card within the poroaram: 


& 


vr 
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FILE (CK IND=1sMAXRECSIZE=20-8LOCKSI7Z6&=300) 
and the FT control card: 
? ETCFILE FILES CTE ILESFCVS/FILE7-INTMODESERCOICeARFAS=1 , 
AREASIZE=90,PROTFCTIGN=SAVE)); 
Card Input Files: 


Logical unit 05 was assianed to a mass-storaoe file which containe 
the card image read by FMCTS. The FILE source card usen was: 


FILE SCKIND=1-FILETYPE=7) 


and the ET control card was: 


7 €T¢ ILESCTITLE=FCVS/FILES-INTMODE=ESCDIC)); 
Wa etimizatio npiler may or may not have optimization features. 
If there was a zation feature avatlables, tt was used durina the 
validatton pre (during a separate execution of the Compiler Validati 


System) to determine if its use causes the compiler to produce a program whict 
Joes not ive the expected results. If the optimization is invoked througt 


: tne compiler call statement then it ts mentioned in paracrapk 1 above. E+ 
f it is invoked through the introduction of a compiler directing source proora 
staterents It is shown below. Cptimization which would renquire medification 
: te source prooram statments is not considered in this renort in that it is 


beyond the scope of the use of Standard FORTRAN and the valication process. 


The default optimization settina (GPT=C0) was used for this validation. ré 
The compiler was not validated for any other optimization settinis. 


4. Compiler. 
FORTRAN II.< 
par peratinga system. 
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APPENDIX & 


VALIDATION SUMMARY WORKING DOCUMENT 


This appendix 18 a workitno paper produced durinae the validation and 
documents the results ef the comnilation and execution of each of the 
erograms comprising the FCVS. The results contained herein ere based on 
the use of the compiler within tne Validation Environment identified in 
tnis appendix. This appendix (Validation Summary Working Pocument) 6 not 
part of the official Validation Summary Report (VSR), and it is not intende 
to reflect in any way the compiler's usefulness or decree of confermance 
to the lLanauacge snecifications. 


The reader of this appendix sheuld keep in mind that the same probler 
grea may appear in more than one program but 158 considered only as a 
single oiscrepancys and the problem is reflected only once in the body of 
the VSR. (The VSR will in turn only reference the first occurrence of the 
nroblem in the anpendix.) 

This appendix is divided jnto four parts. The first part describes 
the Validetion Environment. The second part Lists the Monitor Input Cares 
used in creatine a job control stream for execution in the batch mode. 

The third part shows the control cards reauired to compile and execute an 
individual program. The fourth part of the document is divided into two 
categories of information: compilation results and execution results. 

Information items, such as compiler warnina messacese are includea in the 


summery of compilation and execution results. 


The reference document for FORTRAN is American Standard FORTRAN, 
Beh deel hour 
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VALIDATION ENVIRONMENT 


‘PILEK IDENTIFICATION: FORTRAN II .9 


COMPUTER SYSTEM: Surrouchs ©7705 


YPERATING SYSTEM: MCE 


Fach of the crocrams comprising the FCVS was compiled with the default 
optimization setting (OPT=0). The proarams which test I1/0- FM100 throua 
FY¥TO%. were run twice. The proarams were first run with the output lovical 
unit assigned to a mass-storane jevices and then rerun with the output 
logical unit aessiened to a tape device. 
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CCVS MONTTOR INPUT CARNS 


The CCVS Executive Foutine was used to orepare the FCVS nroacrams tor 
2xecution. The Monitor Control Cards used as input to the CCVS Executives 
are Listed below: 


*CCVSVR NONE 
DATE 770913 
REL TSYSCONE * 
*LIST UPDATES ¢XCARDS-CTIL-INSERT 


CFORTRAN routine selection cards) 


* JOR VALIDATEFOSTRA! 
USERS KEMM TERE CCN 
FAMILY DISK=LSSPACK OTHERWISE PREKS 
EGT? 
ETCFILE FILESCTITLE=FCVS/FILES, INTHODE=ERBCDIC)); 
ETCFILE FILEG CTI TFLEH=FCVS/FILEGAINIMODE=EBCOIC)); 
ETCFILE FILE7CTITLE=FCVS/FILE7-INTMODE=ESCDICAREAS=1 
ARFASTZE=9O0,PROTECTICON=SAVE)); 


s 


COMPILE XXXXX LET WITH FORTRAN [FCT2; 


TA CARD 
$6 SET LINEINE 
FELE SCKIND=E=1TsFILETYPE=7) 
FILE 64CKIND=GsMAXRECSIZE=22) 
FLEE 7CKIND=T-MAYXRECSIZF=H2N,-RLOCKSIZFE=H=3N0 
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ne Ea AL MIEN 


‘ 


The job control stream for runnina the 
rLlLowino control cards: 

? JOB VALIDATEFORTRARN: 

USER =X XXKX¥XX KX X 

FAMILY BDISK=LSSPACK OTHERWISE PACK; 

BEGIN 

F ETCFILE FILESCTITLE=F CVS/FILESSINTM 

? ETCFILE FILEGCTETLE=FCVS/FILF6-INID 


* ‘EPCREEE 


2 ¢€9 
DAT 
2 St 
PERE 
FREE 
FILE 


2 see 
DATA 
FLEE 
FIL¢ 
EBEE 


(CF 


FND 


CONTROL CARDS FOR FPUNNING 


FILE CCTITLE=F CVS/FILET*INIF 


AREASTZE=90-PROTECTI 


SCKIND=T-FILE TYPE =7) 


FCVS 


FEY¥S 


HESFF 


WPILE FAOO1 CET] WITH FORTRAN COTI; 
CARD 
ET LINEINFO 


ACKIND=6-"AXRECSIZFRHC2) 

TCKEND=1TsMAXRECSI7ZEHRH20,-8LOCE SITE = 
FORTRAN source code for proaram F 
“PILE F#ROG2 CET} WITH FORTRAN FCT 
CARD 


T LINEINFO 
DSCKIND=1T-F ILE TYPFH=7) 
ACKTND=6e SAXRECSTZE=27 2) 


(CKIND=ETSMAYRECSIZE=20-8LOCKSI7E= 
ORTRAN source code for program FMOUGE 
JOR 


rPRO 


oro 


rans 


COTE?) = 


DF=ERCHIC)); 
neoere 


consisted 


COICA-AREAS=100, 


i=SAVF))> 


of 


the 
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FrOCY through FMOT2 
A. Compilation 

NO ef FOrS . 

RB. Execution 


No errors. 


> 


- Compilaticn 
The statement 
60 T0 Ir (7eé6er1 26571264) 


where neither 1262 nor 1264 appear in an ASSIEN statement 
eenerates the warning messaaes 


ARNING: “1262” LABEL APPEARED IN ASSIGNED-GO-TO BUT NGT ASS 
NMARNING?: "72646" LABEL APPEARED IN ASSIGNED-GO-TO BUT NOT ASSI! 


These ere valid warning messages. 
Bs Feecution 


AO @FFOFrS « 


A. Cenapilation 
No errors. 
Fe Feecution 


NO errors. 


Awe Compilation 


No errors. 


ie Execution 
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1. The PAUSE statement, PAUSE G123- cisplays the Lines 


DISPLAYSPAUSE 123. 
PROGRAMATICALLY SUSPENDED 


cae The octal diqits in a STOP ?4/ statement are not displayed. 
The above results are not considered errors and are incluced for 
completeness only. For the PAUSF statement the FORTRAN Standard 
states, "At the time of cessation of execution the octal digit 
strines is accessible." 
In a published clarifications the FORTRAN Standard Committee stated: 
“The accessibility of nm in a STOP statement is intentionally not 
specified in the standard. *y not so specifyinns the standard permits 
the practice of terminating rrocram execution without necessarily 
making n accessible." 

F“C15 through FMO44 

A. Compilation 

No errors. 


H. Execution 


YO errors. 


Am Compilation 


Test 759 in F¥045 was flagged as a fatal error. The statement tests 
the use of 57 nested parentheses to enclose the riahtc-hard sice of 
in arithmetic assianment statement. The source code is: 


c 


IVEOMP = CCOCCOCOCECCOCOCECECECCECOCEC ECC OCEC ECO COC CECE CO COEC CEC CCC 
IVONC1 ¢ IVONG2 
PREP DIO I) 2) PDI) IIS PIN PID aD DD 2D 


Tne fatal message stated: 


"(" COMPILER LIMIT FOR OPT=0 EXPRESSIONS EXCFEEDED=<O1VICF THE 
EXPRESSION INTO SUREXPRESSIONS 


(Although not part of the official validation which was performed 
for the default optimization settina (OPT=0),. the program FMU4S 
compiled successfully with OPT=1 specified.) 


« Execution 


Test 759 had to be deleted, ALL other tests executed correctly. 


FNUSO through Fet4se 
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b 

: 

4 F : : 

j - Compilation 
; No errors. 


'. Fxrecution 
\o errors. 
F™USf! throuach FMORZ 
4. Compilation 
No errers. 
be Execution 
No errors. 
FNOS? through FMN99 
Ae Compilation 
Creel Ss s 
- Execution 
No errors. 
FIRTRAN JT/O Proarams - F*™100 through FMICY9 


The 1/6 programs were executed with the cutput logical unit assianed 
to a tape device and rerun with the output loscical unit assianec to a 
nass-Storaqe device. 
F’MI0L through FM159 

A. Compilation 


No errors. 


be. Execution 
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